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ABSTRACT 

Selective problem areas relating to computer based ESM 
system software development are discussed. Digital simula- 
tion is presented as a practical approach to solving software 
development problems. An algorithm to simulate a hard-wired 
EW signal preprocessor is developed. An application oriented 
high level language version of the algorithm is presented. 

A FORTRATJ program which generates realistic data for 
signal analysis is described. Using the simulated data, an 
instruction level simulation program, and a language compiler, 
the algorithm is tested using an IBM 360 computer. 
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I. 



INTRODUCTION 



A. STATEI-IENT OF THE PROBLEM 

Electronic Warfare Support Measures (ESM) is that 
division of Electronic Warfare (EW) concerned with exploita- 
tion of enemy use of the electromagnetic spectrum. ESM 
includes actions taken to search for, intercept, locate, and 
analyze electromagnetic radiations to support tactical 
military operations. 

The continuously increasing density and complexity of 
today's electromagnetic environment, created by friendly as 
well as hostile forces , has fostered the requirement for more 
effective performance and greater sophistication in operational 
ESM systems. Current receiver technology has kept pace v/ith 
this escalation, and signal intercept is virtually assured. 
However, the resulting increased data rates, existing and 
forecast manpower limitations, and limited reaction time 
available to the operational commander have imposed a require- 
ment for faster and more accurate signal analysis, classifica- 
tion, and interpretation. Currently, major efforts are being 
put forth to achieve an effective ESM system design incorpo- 
rating high speed digital computers for the purposes of 
automatic signal analysis and system contrcl. 

To perform effectively in present and future environments, 
an automated ESM system should exhibit the follov;ing 
characteristics : 
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1 . Broad frequency range . 

2. Simultaneous coverage of entire frequency range. 

3. High probability of intercept. 

4. Low false alarm rate. 

5. Capability to recognize pulse or radar-like signals. 

6. Capability to determine parameters associated with 
radar pulse trains. 

7. Capability to classify signals according to type and 
source . 

8. Direction finding capability. 

9. Capability to handle data rates. 

10. Capability to detect signals at ranges to radar horizon. 

The successful design and development of a system exhibiting 
these characteristics rest upon three equally important 
elements; system hardware, system software, and the man- 
machine interface. 

-*■ * ESM Hardware/S ys tehi Description 

A discussion of ESM hardware as a specific problem 
area is beyond the scope of the thesis. A system concept 
compatible v;ith the state of the art approach is presented 
here as a basic foundation for this study and future efforts 
in the ESM arena . 

Conceptually, an airborne ESM system with the charac- 
teristics previously described could be implemented utilizing 
a combination of Instantaneous Frequency Measurement (IFM) 
and Superhet receivers. The IFM ’receivers , operating in 
conjunction v.’ith a high-gain pencil beam antenna, would cover 
the frequency bands of interest and function as the primary 
acquisition receivers of the system. In addition to contrib- 
uting to increased system sensitivity, the high-gain pencil 
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beam antenna functions to reduce the instantaneous data rate 
and, in conjunction with azimuth centroiding, provides an 
accurate means of determining signal direction of arrival. 

Additional data rate red\:ction is accomplished by 
routing each IFM output through a Pulse Train Separator (PTS) , 
which functions as a signal preprocessor to separate stable 
pulse trains from the received data. Parameter measurements 
are performed on those stable trains separated and a computer 
V7ord is generated to tag the associated emitter. The required 
capacity of the PTS in nimber of pulse trains separated is 
considered paramount to system operational effectiveness. 

A computer word is generated for each pulse associated 
with non-stable pulse trains and those stable pulse trains 
exceeding the capacity of the PTS. These data are routed 
through a residual channel of the PTS to a high-speed digital 
computer for deinterleaving and parameter measurement. The 
parameters associated with each signal are then passed to a 
main frame computer for classification, threat analysis, and 
tactical environment update. 

The IFM system employs an omni antenna for side lobe 
suppression to prevent signal poke-through in the receiving 
antenna minor lobes. The IFM sensitivity and antenna gain 
provide a capability for radar detection cut to the radar 
horizon for aircraft altitudes in the neighborhood of 
30,000 feet. 

Priority signals, unclassif iable signals, and signals 
too complex for automatic analysis are automatically assigned 
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to digitally controlled superhet receivers for refined 
analysis. The superhet receivers cover the frequency bands 
of interest and operate in conjunction with an omni or low- 
gain broad beam antenna. 

2 . Man-Machine Interface 

The human operator element of an automated ESM system, 
though normally an area addressed by human factors engineers, 
impacts heavily on the software requirements and will be 
discussed here in that regard. 

Automation does not eliminate the requirement for 
human operators, but it does significantly affect the role 
the operator plays in the ESM system and it may seriously 
retard the operator's proficiency and ability to function 
efficiently as a back up in the event of a system failure. 

Thus, in deciding v;hich system functions should be automated 
and which should be assigned to the human operator, it is 
imperative that the operator be assigned those functions that 
maximize the use of his capability to exercise judgment, 
improvise, reason inductively, and profit from experience. 

The human operator must be able to control and direct 
the operation of the system. To do so, he m.ust be provided 
relevant information by the system at the proper time, in the 
proper format, and on the proper displays. To obtain efficient 
and reliable softv;are, these requirements must be clearly and 
accurately defined in the planning stage of the ESM system 
development. 
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3. ESM Software 



It is felt that software represents the most trouble- 
some problem in the design and development of an automatic 
ESM system. Assuming cost and risk vary directly with 
complexity, ESM software will account for a substantial 
percentage of total system costs and be the riskiest part of 
the system development. Since system performance hinges on 
softv;are performance, implementation of an effective software 
test plan would serve a threefold purpose of cost reduction, 
risk reduction, and increased system performance. 

The ability to successfully implement such a test 
plan requires a detailed description of the systems functions 
and a software modular building process. Each softv/are 
module or set of modules is then integrated into the system 
and tested against sets or subsets of system functions 
according to prescribed test plans. 

B. SCOPE OF THE THESIS 

Simulation, via computer software, is one technique that 
is useful in software development and verification cr testing. 
Realistic data, created by successful simulation of the ESM 
system, hardware operating in a dynamic environment, utilized 
as inputs to a high-speed digital computer would provide the 
framework for implementation, testing, and optimization of 
ESM signal processing algorithms. The inherent ability to 
control the density of the electromagnetic environment through 
simulation would provide the capability to analyze worst case 
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situations, thereby enabling system designers to estimate 
computer capacity and reserve capacity requiremicnts as v/oll 
as data rate reduction requirements. 

Given these simulation capabilities, an i.nstruction-level 
simulation of the target computer provides a powerful means 
of debugging software and algorithm testing for accuracy and 
speed of operation. Applied Technology Division of Itek 
Corporation, Sunnyvale, California, has provided the Naval 
Postgraduate School with the programming support system for 
their ATAC computer. Instruction level simulation is only 
a part of this software package which includes the compiler 
programs for Programming Language for ATAC (PL/ATAC) , a high 
level language developed for ATAC applications prograimning . 
Acquisition of the ATAC Programming Support System (APSS) 
gives impetus to the utilization of simulation as a technique 
for ESM software development and testing at the Naval Post- 
graduate School. 

Total hardware simulation of the ESM system previously 
described is beyond the scope of the thesis. Total system 
simulation does, however, lend itself to a software "build'' 
process and as a first effort of the process, three specific 
objectives of this work are as follows; 

1. Provide a digital simulation of an IFM receiver operating 
in conjunction with a high-gain, pencil beam DF antenna 
in a dynamic radar environment. 

2. Provide a digital siiaulation of a hard-wired pulse train 
deinterleaver fed by an IFM receiver. 

3. Describe and demonstrate the capabilities of APSS, 
particularly, the PL/ATAC programming language. 
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The overall objective of this work is to provide a building 
block as a basis for follow on study of ESM system software 
at the Naval Postgraduate School . 
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II. COMPUTER SYSTEM FOR ESM SOFTWARE DEVELOPMENT 



A. GENERAL DESCRIPTION 

APSS v;as written for Applied Technology's Airborne 
Computer (ATAC) . ATAC , specifically designed for Electronic 
Warfare applications, is v/ell suited for ESM softv;are design, 
development and testing. A mamber of features of this 16-bit, 
fixed point, two's complement computer permit the establishment 
of a meaningful baseline for determ.ining the relative merit of 
algorithms applicable to computer based ESM systems. Special 
features of interest are; 

1. 437 nanosecond major cycle time. 

2. Sixteen general registers which may be used as 
accumulators or as index registers . 

3. Microprogramrnable processor, permitting optimization of 
the instruction set for specific applications. 

4. Memory types can be mixed in any combination of lov; pov/er 
Read Only Memory (ROM) , fast bipolar Random Access 
Memory (RA.M) , and slov;er core mem.ory devices. 

5. Memory expandable to 65K words. 

6. Four basic instruction addressing modes: 
register, immediate, direct, and direct indexed. 

7. Three supplemental addressing m.odes: 

register indexed, immediate short, and direct register. 

8. Provisions for up to 16 Direct Memory Access (DMA) 
channels . 

9. Provisions for up to four simultaneously active DMA 
channels . 

10. Tv.’elve hardware priority interrupts. 

11. Modular, comipaci: construction. 

Additional detailed information, including the instruction 
set, may be obtained from ATAC, Applied Technology Airborne 
Computer, Vol. I, Principles of Operation. 



B. ATAC PROGRAMMING SUPPORT SYSTEM (APSS) 

This software support system allows for the preparation 
and debugging of programs via an IBM 360/370 computer system. 
APSS, through simulation of the ATAC computer and associated 
peripheral devices, permits the applications programmer to 
optimize programs for execution speed and memory utilization. 
The APSS system is written in a combination of PL/1, FORTRAN 
IV, and IBM assembler language and includes the programs 
listed below. 

APSS Monitor 

ATAC Instruction Assemibler 
ATAC Instruction-Level Simulator 
Relocating and Linking Loader 
Microcode Assembler 
Microcode-Level SimtUlator 
PL/ATAC Compiler 
Library Control System 
Subroutine Library 

Arrangements were made with Applied Technology to use portions 
of APSS and consequently, the ATAC Instruction-Level Simulation 
Program and the PL/ATAC Compiler are currently operational on 
the IBM 360/67 at the Naval Postgraduate School. Information 
concerning the im.plementation of these programs and instruc- 
tions pertaining to the use of the programs are contained 
in Appendix A. Additional APSS inform.ation is available in 
ATAC, Applied Technology Airborne Computer, Volume 2, ATAC 
Programming Support System (APSS) . The documents in this 
volume provide a detailed description of how to set up and use 
the APSS system. Those documents applicable to this work are: 
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1. simulation of instruction executior*. 

2. Tracing option of the 16 general registers. The contents 
of each register can be printed after the execution of 

an instruction. 

3. Accumulated program execution time printed with each 
line of trace. 

4. Instruction execution histograms by frequency of 
execution or time of execution can be created and printed. 

5. Partial and total simulated merricry dump options. 

6. Initialization of program, data arrays allowing data to 
be read into virtual program memory prior to program 
simulation . 

The APSS Instruction-Level simulator program includes a large 
repertoire of error messages to assist the applications 
programmer in debugging job management and ATAC instruction 
usage errors. 

C . PL/ATAC 

PL/ATAC, Programming Language for ATAC, is a high level, 
block structured language designed specifically for the ATAC 
computer. The programming structure and numerous capc..bilities 
cf the language are demonstrated in Appendix C via the Pulse 
Train Separator simulation program written in PL/ATAC. In 
addition to hardware simulation, a specific objective in 
v/riting this program v;as to provide programming examples of 
the PL/ATAC language to assist the interested programmer in 
learning PL/ATAC. The PL/ATAC manual (Volume 2, Section II, 
ATAC) is an excellent reference but may present some difficulty 
if used as a learning text. 

PL/ATAC is a powerful language providing the prograitimer 
with programming control approaching that of assembly language 
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without comproniising the high level of the compiler language. 
Additionally, ATAC assembly language may be intermixed with 
PL/ATAC increasing prograrriming flexibility and control with 
no serious degradation of program readability. 

An analysis to determine the effectiveness of applications 
programming in the PL/ATAC language versus ATAC assembly 
language was conducted by the author utilizing an assembler 
optimized ATAC benchmark program. The results of this analysis 
indicated a memory utilization increase by a factor of 
approximately 2.3 times the ATAC assembly language requirement 
and an execution time increase by approximately 2.4 times the 
ATAC assembly language execution time. 

The PL/ATAC programmer loses some flexibility, as compared 
to the assembly language programm.er, due to the limitation in 
the number of registers available (a maximum of five) to him. 
Also, the PL/ATAC compiler currently installed at the Naval 
Postgraduate School does not have a double precision capability. 
Double precision calculations, if required, must be accomplished 
in assembly language resulting in increased core space and 
execution time required. 
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III. ESM ENVIRONMENT/ I FM SIMULATION 



Investigation revealed the existence of a. computer program 
[Ref. 1] designed to simulate an IFM receiver operating in 
conjunction with an omni antenna in a dynam.ic radar environ- 
ment. This program was modified to incorporate a rotating 
DF antenna system. Routines were added to generate unstable 
pulse trains in the form of pulse 'jitter' and/or 'stagger'. 
Documentation was added to facilitate program readability. 

The DATA Simiulation Program generates simulated pulsed 
radar signal level data arriving at an IFM receiver via a 
rotating antenna system. Current capacity allows for simula- 
tion of up to ten emitter platforms with up to five cinitters 
per platform. This capaeity may be increased by increasing 
the array dimensions of the parameters associated v;ith each 
emitter-platform combination. Emitter platform and IFM 
platform, initial position information in X-Y grid coordinates, 
course in degrees clockwise from North, and speed in knots 
are set by the program input data. 

Emitter characteristics, set by the program input data, 
consist of transmitter frequency in MHz, pulse repetition 
interval (PRI) in milliseconds, pulse width (PW) in micro- 
seconds, transmitter power in kilowatts, antenna gain in db, 
antenna beamwidth in degrees, antenna scan rate in seconds 
per revolution, and pulse jitter and/or stagger characteristics. 
A sin(x)/x antenna radiation pattern is assumed .for all emitters. 
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IFM receiver characteristics, set by the program input 
data, consist of receiver threshold sensitivity in dbm, upper 
and lower frequency limits of the passband in MIIz, minimum 
time measurement capability in microseconds, antenna gain in 
db, antenna scan rate in seconds per revolution, and antenna 
beamwidth in degrees . 

Additional program inputs include simulation start and 
stop times in seconds, frequency bin size of the IFM digital 
processor, and random number generator calling arguments. 
Complete input data description is depicted in the program 
listing following the description of the program variables. 

A complete program listing is ccntained in Appendix B. 

Utilizing the input data described, the Data Simulation 
Program computes the position, course, speed, and range of 
each emitter platform relative to the IFM platform. The 
closest point of approach (CPA) and distance to the CPA is 
computed for each emitter platform to determine if and when 
a platform will be within the range of detection of the IFM. 
Those emitters out of the detection range during the simulation 
are listed as such. The IFM antenna's and all emitter 
antennas' intial pointing directions are set by a random 
process utilizing a uniform random number generator. The time 
at which each emitter platform enters the capture area of the 
IFM antenna's main beam is calculated and used as a basis for 
computing a random transmit time for the emitters associated 
with that platform. 
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Emitter maximum effective radiated power (P„) is then 

£j 

computed utilizing the mathematical model given by 
‘’e = '’t =t 



where 

P - Transmitted Power, 
t 

= Emitter Antenna Gain, 
and X = Wavelength of Signals. 

Emitter maximum range of detection (R^) is computed by: 



■’m = <Pe 



where 

G^ = IFM Antenna Gain, 

and = IFM Receiver Threshold Sensitivity. 

For each emitter within detection range, the minimum antenna 
gain required to break the IFM threshold sensitivity 

is then computed by 



S . 

min 



Th/G^ Pr 



where 

r = Distance to the Emitter. 
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Using the value, of emitter transmit time previously calculated, 
the emitter antenna pointing direction is calculated. Emitter 
antenna gain as a function of the relative angle between the 
emitter antenna and the IFM antenna is then calculated and 
compared with the minimum antenna gain required to break the 
IFM threshold sensitivity. If the signal level is sufficient 
to break the IFM threshold, the time of arrival (TOA) of the 
pulse at the IFM receiver is calculated. 

If the pulse does not break the IFM threshold, the emitter 
transmit time is incremented by the emitter PRI, the antenna 
position is updated, and the antenna gain calculation process 
is repeated unti3. a signal level of sufficient strength is 
transmitted. Should no pulse be received in the scan tim.e 
of one beamv/idth of the IFM antenna, the subsequent scan of 
the receiver antenna is checked and the process continues 
until a pulse is received or until si.mulahion stop time. 

The time of arrival of the first pulse from each emitter 
is stored in an array and, upon completion of this process 
for all emitters, the array is searched for the lowest time 
of arrival. The receiver antenna bearing at this TOA is 
calculated and provided as output data along with the parameters 
of the associated emitter. The emitter platform position is 
updated and the time of arrival of the next pulse from this 
emitter is calculated and stored in the array. The array is 
then searched for the next lowest tine of arriv^al and the 
process repeated until simulation stop time. 
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The output of the Data Simulation Program consists of 
parameters associated with each pulse received by the IFM 
receiver in the proper time sequence. These parameters 
include the frequency, pulse v/idth, bearing and time of 
arrival . 

This data, as prepared for the ATAC simulation programs, 
consists of five integers for each pulse. These integers 
represent the following: 

1. Emitter bearing. An integer in the range of 0-359. 
This word represents the IFM antenna bearing at the 
time of arrival of the pulse. 

2. Frequency bin. The bins are numbered in ascending 
order of frequency from 1-128. This range n\ay be 
altered as desired by the programmer. 

3. Pulse v/idth. The pulse width word is an integer 
in the range 0-65,535. The time scaling factor is 
arbitrary. Current convention is that the least 
significant bit of the pulse width word corresponds 
to .1 m.icroseconds . This allows for representation 
of pulse widths from 0-6.5 milliseconds to within 
0.05 microseconds. 

4. Time of arrival. Time of arrival is expressed as 
a doxable precision (32 bit) integer. Word 4 is 

the least significant half of this integer and holds 
time values up to 0.84 seconds with the least signi- 
ficant bit corresponding to 25.6 microseconds. 
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5. Time of arrival. The upper half of the time word 
holds time values up to 15.3 hours. 

The Data Simulation Program produces these outputs in 
printed format and in a punched card format suitable for 
acceptance by the ATAC simulation program. A sample of 
the program output is contained in Appendix B following the 
program listing. The program flow chart is illustrated in 
Figures 1 and la. 
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INITIALIZE CCNSTAJITS AND SCALE FACTORS 



READ CALLING ARGUfCMTS FOR R.ANDOM NUMBER GENERATORS, 
SIMULATION START AND STOP TIME, IFM CHARACTERISTICS, 
AMD IFM PLATFORM COURSE, SPEED, AND POSITION. 



INITIALIZE IFM ANTENNA POINTING DIRECTION 



OUTPUT IFM CHARACTERISTICS 






JL 



READ EMITTER PLATFORM INFORMATION 



I 



<TpLATF^^ LT ZERO 

II ■ lar J wulfci 






No 



P OUTPUT EMITTER PlXtFORM INFORMATION 



v»? 




COMPUTE EMITTER PLATFORM COURSE, SPEED, 

AND RANGE RELATIVE TO IFM PLATFORM 





COMPUTE BEARING, CPA, fm DISTANCE TO 
CPA OF EMITTER PLATFORM 






COMPUTE TIME WINDOW IN WHICH THIS PLATFORM 
WILL BE IN RECEIVER ANTENNA BEAMIIIDTH 



T 



READ EMITTER CHARACTERISTICS, CONVERT TO INTERNAL 
FORM, AND COMPUTE MAXIMUM EFFECTIVE RADIATED POWER [ 






OUTPUT EMITTER CHARACTERISTICS 



I 



COMPUTE MAXIMUM RANGE AT WHICH IFM CAN DETECT EMITTER 

— j — 



COMPUTE TIME OF ARRIVAL OF FIRST PULSE FROM EMITTER 



Yes 



I . 



VL THIS TH E LAST EM I TTER ON T H IS PLATF0RM^ >- 



No 



FIGURE 1. Data Siirmlation Program (Simplified Flowchart) 




FIGURE la 



Data Simulation Program (Simplified Flowchart) 



IV. THE PULSE TRAIN SEPARiVTOR 



A. CONCEPT OF OPERATION 

Data received by the IFM are routed to the Pulse Train 
Separator (PTS) . If a pulse train has a stable pulse repe- 
tition frequency (PRF) the PTS locks on the train and tracks 
the train for a period of tirae determined by the receiver 
antenna scan rate and beamwidth. The signal's pulse width 
(PS) and pulse repetition interval (PRI) are measured and 
digitized along with azimuth, time first seen and frequency. 
These five parameters are used to tag the associated emitter 
and are routed to the main fram.e computer for emitter classi- 
fication. Direction of arrival is comii^uted by azimuth cen- 
troiding based on the receiver antenna bearing at the time 
of arrival of the first and .last pulse of the signal. The 
possibility exists that, due to sin(x)/x characteristics 
of emitter antennas, centroiding will be performed on ragged 
signal inputs. This is not considered degrading to system 
performance as meaningful direction of arrival infoimiation 
will still result. 

An inherent characteristic of the Pulse Train Separator 
is that those stable trains v;ith the lower values of PRI will 
be separated first. This feature of the PTS is also desirable 
as the data rate reduction role of the device is enhanced. 

The required capacity of the device in this role of data rate 
reduction has not been established and is considered a m.ost 
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important factor in the overall ESM system design. Failure 
to provide the proper level of preprocessing could result 
in system software and hardware overloading and, consequently, 
degraded system performance. 

Those stable signals exceeding the capacity of the Pulse 
Train Separator and non-stable signals such as frequency 
agile signals, jittered pulse trains, staggered pulse trains, 
and other exotic signals are routed through a residual signal 
channel of the pulse train separator to the high speed mini 
computer for parameter measurement . For each of these pulses 
received, a computer v7ord will be generated for frequency, 
time of arrival, pulse width, and direction of arrival. Pulse 
deinterleaving and such parameter measurements as pulse 
repetition interval and pulse jitter and stagger character- 
istics will be performed by the mini computer for emitter 
classification . 

B. PTS SIMULATIOi.^ PR0GRAI4 

The Pulse Train Separator Simulatipn Program is designed 
to simulate a hardware preprocessing system with a capability 
of separating up to a maximum of ten stable pulse trains from 
the output of an IFM receiver. 

Input data to the program consist of a series of five 
integer words for each pulse generated by the Data Simulation 
Program; direction of arrival in degrees clockwise from North, 
frequency by bin number, double precision time of arrival 
(two words) in seconds with the least significant bit 
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corresponding to 25.G microseconds and pulse width in seconds 
with the least significant bit corresponding to ,1 microseconds. 
These data are loaded into a large input buffer prior to the 
start of the program simulation. 

Each pulse within the buffer is compared in frequency 
with previously received pulses within the same receiver 
antenna beamwidth. If no match in frequency occurs the pulse 
is considered a new signal and a pointer address is stored 
in a New Signal Pointer File. If a frequency match occurs, 
the pulse width of the signals are compared. Upon obtaining 
a match in pulse v;idth the matched pulse's pointer address 
is stored in a five element array within the New Signal 
Pointer File. Upon receipt of five pulses of a pulse train, 
the program calls a local re-entrant procedure (PRICOMP) 
wherein the stability of the pulse train is determined. For 
purposes of this simulation a pulse train is considered 
unstable if the variation in time interval between pulses 
is greater than 51.2 microseconds and/or three or more 
missing pulses are encountered in ragged signals. Upon 
determining a pulse train to be stable, the pulse repetition 
interval of the signal is calculated and the signal is 
flagged as a stable train. The number of available channels 
in the Pulse Train Separator is then reduced by one and the 
signal is zeroed in the input buffer as each additional pulse 
is received. Parameters associated with this pulse train 
are stored and the signal bearing is updated as each pulse 
is received through incrementation of the input buffer. 
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Upon receipt of the last pulse expected from the pulse 
train, the centroid direction of arrival is calculated and 
the signal information is zeroed in the New Signal Pointer 
File as well as in the first five input buffer Icoations. 

The time of arrival of the last pulse expected is computed 
utilizing the scan time for one receiver antenna bandwidth. 

Non-stable signals are flagged as such and remain in the 
input buffer. Upon completion of incrementation through the 
input buffer, all stable pulses, except those from trains 
that remain due to PTS capacity having been exceeded, have 
been zeroed from the input buffer. Parameters associated 
with tliese trains are stored in sequence according to pulse 
repetition interval. 

The pulse information remaining in the input buffer, 
associated v^ith the \instable pulse trains and with pulse 
trains exceeding the PTS capacity, is then compressed v/ithin 
the input buffer, thus allowing for simulation of the mini 
computer signal processing algorithm. In the initial design 
concept of this simulation program, these remaining data, 
representing the Pulse Train Separator residual channel, 
would be processed by an ATAC assembly language program 
incorporated as a local procedure v/ithin the PTS program 
using the code selection head as described in the PL/ATAC 
manual . 

A complete PL/ATAC program listing of the Pulse Train 
Separator is contained in Appendix C. An assembly language 
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program generated by the PL/ATAC compiler is contained in 
Appendix D. A program flowchart is illustrated in Figures 
2 and 2a. 
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FIGURE 2. The Puioe Train Separator Program F.lov;chart 
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FIGUPJS 2a. The Pulse Train Separator Program Flowchart 
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V. DISCUSSION OF SIMULATION RESULTS 



A. SUMMARY OF RESULTS 

The Pulse Train Separator as described in Chapter IV 
was simulated utilizing the ATAC Programming Support System 
and the PL/ATAC Programming Language. The particular hardware 
system simulated was arbitrarily given the capability of 
deinterleaving and preprocessing up to nine radar pulse trains. 

Input data, provided by the Data Simulation Program, 
consisted of a mixture of stable and non-stable pulse trains 
from eighteen emitters located on six platforms geographically 
positioned so as to be intercepted in one receiver antenna 
beamwidth. The receiver antenna beamwidth v/as arbitrarily 
set at five degrees . 

Using a receiver antenna scan rate of two seconds per 
revolution, the Data Simulation Program generated a total of 
365 pulses as IFM output during one antenna main beam sweep 
of the eighteen emitters. These pulses represent approxi- 
mately 28 milliseconds of real time data. The Pulse Train 
Separator Simulation Program, in processing nine of the pulse 
trains, removed 277 pulses from the input data and routed 
88 pulses through the residual channel. These 88 pulses 
represent the unstable pulse trains and the lower pulse 
repetition frequency (PRF) signals. Accurate pulse repetition 
interval calculations as well as accurate azimuth centroiding 
was performed on all preprocessed pulse trains. 
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B. C0NC3.USI0NS 

The Data Simulation Program provides realistic data to 
the APSS programs. The program produces reasonably complex 
data in the form of jittered pulse trains and staggered 
pulse trains. Pulse trains transmitted at sufficiently low 
power levels are produced with missing pulses due to sin(x)/x 
effects . 

The Pulse Train Separator Simulation Program demonstrated 
the use of the PL/ATAC language and functions as designed to 
preprocess ESM signals. This program is somewhat inefficient 
in its present form for two reasons. First, the limitation 
of five registers allocated to the programmer by the PL/ATAC 
compiler leads to a significant increase in program execution 
time as compared to a program written in ATAC assembly language. 
As tlie programmer gains experience with the PL/ATAC language, 
this limitation of the compiler may be overcome somev;hat by 
programmer 'tricks' to gain use of registers. 

The lack of a double precision capability in the current 
version of the PL/ATAC compiler installed on the IBM 360/67 
at the Naval Postgraduate School created a severe handicap 
in writing the Pulse Train Separator Simulation Program and 
also contributes to program inefficiency. Each double 
precision calculation performed requires a program segment of 
assembly language and the housekeeping involved results in 
increased program execution time. 

Even with these limitations it is felt that the simulation 
programs presented in this work provide the framework for ESM 
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software development and applications programming at the 
Naval Postgraduate School. 



C . RECOMMENDATIONS 

Based upon the experience and results obtained from this 
study, recommendations for follow-on study in the area of 
ESM software development are as follows: 

1. Continue study of the Pulse Train Separator Program 
and optimize the basic algorithm. 

2 . Implement the resulting improved algorithm in ATAC 
assembly language. 

3. Use the Data Simulation Program and optimized hardware 
simulation with APSS to develop and optimize ESM signal 
processing algorithms. 

4. Continue use of the PL/ATAC compiler to develop and 
test hardware simulation and other programs prior to 
implementation in ATAC assembly language. 



36 



APPENDIX A 



INSTRUCTIONS FOR INSTALLATION AND USE OF THE ATAC 
PROGR/aMMING SUPPORT SYSTEM (APSS) ON THE IBM 360/67 
OPERATING SYSTEM AT THE NAVAL POSTGR/iDUATE SCHOOL 



A. INSTALLATION 

The ATAC Progranming Support System is currently loaded 
on the 2321 Data Cell. Data set names and their locations 
are as follows: 



1. 


S1615 .RDS.LOADLIB 


- CEL 


007 


2 . 


S1616.RDS.APSS 


- CEL 


005 


3. 


S1615 .RDS .PLATAC 


- CEL 


001 



In the event of failure of the Data Cell these data sets may 
be reloaded from the APSS source tape stored at the V7.R. 
Church Computer Center under the name * ATI. 006'. 

File frl of this tape contains a description of the tape. 
File #2 contains examples of the JCL required to create and 
run APSS. The instructions contained in this file are super- 
seded by the instructions contained here. The following JCL 
is required to list these files: 

//(STANDARD JOB CARD) 

//EXEC PGM-IEBGENER 
//SYSPRINT DD SYSOUT=A 
//SYSIN DD DUMI'IY 

//SYSUT2 DD SYSOUT=A, DCE= (LRECL--=80 ,RECFM=F ,BLKSIZE=80) 
LABEL= (1,SL, ,IN),DCB= (BLK3IZE=800 ,LRECL=80 , 
PJSCFM=FB) ,VOL=SER=7^TI006 ,DSN=FILE1 
// EXEC PGM=IEBGENER 
// SYSPRINT DD SYSOUT=A 
//SYSIN DD DUWIY 

//SYSUT2 DD SYS0UT=A,DC3= (LRECL=S9 ,PJ:CFM=F,BLKSIZE=80) 
//SYSUTl DD UNIT= (240C ,, DEFER) ,DISP= (OI.D, PASS) , 

LABEL= (1,SL, ,IN) ,DCB= (BLKSIZ£=800 ,LRECL=80) , 
RECFM=FB,VUL=SER=ATI006 ,DSN=FILE2 



File #3 of the source tape contains the object module 
library of APSS and is required to build the APSS Instruction 
Level Simulator. File #4 contains the PL/ATAC Compiler object 
module. The following steps are required to build APSS from 
files 3 and 4. 

1. Read files 3 and 4 from tape to disc storage. Special 
arrangements should be made to insure that the disc pack used 
has sufficient unallocated space for this step and the 
follovjing step of this procedure. SP00L3 has been made 
available in the past and is the disc used in the JCL of this 
example. The load modules from file 3 are moved into a disc 
file named • S1614 . RDS .LOADLIB ' . File 4 is moved into a disc 
file named ' S1615 .RDS . PLATAC ' . The utility control statements 
may be changed to rename the files as they arc being loaded 
onto the disc. The JCL statements required are as follows: 
//(STAl^DARD JOB CARD) 

//STEPl EXEC PGr4=IEIIM0VE, PP:GI0N=100K 
//SYSPRINT DD SYSOUT--=A 

//SYSUTl DD UNIT=SYSDA,SPACE= (TRK, (40) , ,CONTIG) 

//DAI DD UNIT=2314 ,DSN=S1G15 .RDS .LOADLIB, 

//SPACE= (TRK, (50,10,10) , ,CONTIG) , 

//DISP= (NEW, KEEP) , VOL=SER=SPOOL3 

//TITAPE DD UNIT= (24 00,, DEFER) ,DISP= (NEW, PASS) , 

LABEL= (3 ,SL, ,IN) , 

//DCB= (DEN=2,BLKSIZE=800 ,LRECL=80 ,RECFM=FB) , 

VOL=SER=ATI006 
//SYS IN DD * 

COPY PDS=ATI .APSS. LOADLIB, TO=2314=SPOOL 3 ,TODD=DAl, 
FR0MDD=T1TAPE, * 

FROM=2 400 = (ATI006 , 3) , REN AI4E=S1615 . RDS . LOADLIB 
COPY DSNAME=ATI .TvPSS . PLATAC ,TO”2 314=SPOOL3 , 

FR0MDD=T1TAPE , TODD=DA2 , * 

FROM=2400=^ (ATI006 ,4) , RENAME=S1615 . RDS . PLATAC 
//DA2 DD UNIT=2314 ,DSN=S1615. RDS. PLATAC, SPACE=(TRK, 

(20,10) ,RI,SE) , 

//DISP= (NEW, KEEP) , VOL=SER=SPOOL3 ,LABEL=PJ3TPD=360 
/* 
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2. The Library (named ' S1615 . RDS , LOADLIB ' ) nov/ on the 
disc must be built into an absolute load modvile of the entire 
APSS system. The module thus built (named ' S1615 .RDS . APSS ' ) 
will be stored permanently on cell 005 of the data cell. This 
file may also be renamed as desired. The following JCL state- 
ments are required. 

//(STANDARD JOB CARD) 

//BUILD EXEC PGM=IEV7L,REGION=150K, 
//PARM='OVLY,XREF,LET,LIST,SIZE= (256K, 20480) ' 

//SYSPRINT DD SYSOUT=A 

//LIBRARY DD DSN=S1615 .RDS .LOADLIB ,UNIT=2314 , 

VOL=SER=SPOOL3 , DISP=SHR 
//SYSLIB DD DSNAME=3YS1 .FORTLIB,DISP=SHR 
//SYSLMOD DD DSNAME=S1615 . RDS . APSS , UNIT=2 32 1 , 

VOL=SER=CEL005 , 

//DISP= (NEW, KEEP) , LABEL=RETPD=360 , 

//SPACE= (TRK, (300,20,2) ,RLSE) 

//SYSUTl DD UNIT=SYSDA,SPACE= (TPJC, (19,19) , ,CONTIG) , 
SEP=SYSLMOD 
//SYSLIM DD* 

INCLUDE LIBRARYEPFiUDLN 
CHANGE MSIMEIHESAPDN 
INCLUDE LIBRJ\RY (APSSMON) 

INCLUDE LIBRARY (MS IM4 , ASEM5 , SIM16A , SIMTRl ,SIMI01 , GUL) 
INCLUDE LIBRARYEXPLMONN 
OVERLAY A1 



INSERT 


MSIMUL, 


*MSIMULA 


, IHENTRY 


, IHESAP 




INSERT 


MINT, IN, OUT 








INSERT 


IHEDBN, 


IHEXID 








INSERT 


IHEBSM, 


IIIECSM 








INSERT 


IHEBSK, 


IHEIOX, 


IHEIOP, 


IHEDID, IHEDOB 




INSERT 


IHEBIB, 


IHEDOA, 


IHEIOB 






INSERT 


IHEIOA, 


IHEOCL 








INSERT 


IHEBSD, 


IHEBSF 








INSERT 


IHEJXS 










INSERT 


IHEOSD, 


IHEOST, 


IHEBSI 






INSERT 


IHEVPE, 


I HE DMA, 


IHEVFB 






INSERT 


IHEDNC, 


IHEVFD, 


IHEVFA , 


I HE VP D, IHEVPB, 


IHEVSC 


INSERT 


IHEVSD, 


IHEVFE, 


IHEDCN, 


IHEUPB 




INSERT 


IHEVFC, 


IHEVPE, 


IHEVPG, 


IHEVQB, IHEVQC 




INSERTIHEABN, 


IHEIOD, 


IHEIOF, 


IHEPRT, IHEVQA, 


IHESPRT 


INSERT 


IHEBEG, 


IHEERR, 


IHESIZ 






INSERT 


MISET 











OVERLAY A1 

INSERT ASSEM, REWIND, REW72 , DSKOUT, CARDIN, DISKIN, 
ERPRT, PRIADD 
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INSERT WRDATA, PRICOM, PRINOR, WRITEX, REFTIT, PPJ3F, 
ERTIT 
OVERLAY A1 

INSERT PAR^^RD, PRESIM 
OVERLAY A1 

INSERT SMLTR, NRMTRM, STRTSM, TPAGE 

INSERT RDCPJD, ABNRMT, ARTIIFP , TRACE, HGRAM, HGRAMI , 
HGRAMS 

INSERT lOINIT, ACTIVE, SIMTIM 

INSERT DEVDTA, ACT, TIME, INT, RAND, DEADT , DEBUG 
OVERLAY A2 

INSERT LEVEL, D^^AIOI , DMAIOA, DMAIOD, RIOIO 
INSERT REMACT, DMA, DJIATM, RIO, RIOTM, RIOINT, INTOLY , 
DMA INT 

INSERT DTRAN, PUTACT , RANDOM 

OVERLAY A1 

INSERT HGPRNT 

OVERLA.Y A1 

INSERT LAODER 

OVEPXAxY A1 

INSERT LINK, ENTEXT, SLLK 
0\’ERLAY A1 

INSERT PLATAC, lOPACK 
OVEPXAY $OBJECTEREGIONN 

INSERT OBJECT, INIT, LIB, RCALPH , RCHEX , RCINT 
INSERT MDATE 
OVERLAY $DUMiPEREGIONN 
INSERT SMDUMP,PAGE 
ENTRY MAIN 
NAME APSS 
/* 



3. The PL/ATAC compiler object module on the disc must 

be moved to the data cell. 

//(STANDARD JOB CARD) 

//EXEC PGM=IEBGENER 
//SYSPRINT DD SYSOUT=A 

//SYSUTl DD DISP=SIIR,UNIT=2 314 ,VOL=SER=SPOOL3, 

//DSN=S 161 5 .RDS. PLATAC 

//SYSUT2 DD DISP= (NEV7, KEEP) ,UNIT=2 321, VOL=SER=CEL001, 
//DCB= (RECFM=FT,BLKSIZE=7188) ,LABEL=RETPD=360 , 

//SPACE= (7188, (20,0) ) , DSN=S1615 . RDS . PLATAC 
//SYSIN DD * 

GENERATE 

/* 
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4. The Library ( ' S1615 . RDS . LOADLIB ' ) must now be moved 

from the disc to the data cell for permanent storage. This 

library contains modules necessary for successful execution 

of the PL/ATAC compiler. The required JCL statements to 

accomplish this step are as follows; 

//(STANDARD JOB CARD) 

//EXEC PGM=IEBCOPY 
//SYSPRINT DD SYSOUT=A 

//SYSUTl DD DISP=SHR,UNIT=2314,V0L=SER=SP00L3, 

//DSN=S1615 . RDS . LOADLIB 

//SYSUT2 DD DISP= (NEW, KEEP) ,UNIT=2321,VOL=SER=CEL007 , 
//DSW=S1 6 15 .RDS. LOADLIB, SPACE= (7294 , (61,0,14) ) , 

//DCB= (RECFM=UT,BLKSIZE=7294) , LABEL=RETPD=360 
//SYSUT3 DD UNIT=SYSDA,SPACE= (TRK, (20 ,5) ) 

//SYSUT4 DD UNIT=SYSDA,SPACE= (TRK, (20 ,5) ) 

//SYSIN DD * 

COPY 0UTDD=SYSUT2,IWDD=SYSUT1 
/* 



B. USER INSTRUCTION 



The JCL required to compile and execute PL/ATAC programs 



is as follows: 

//(STANDARD JOB CARD) 

//PLATAC EXEC PGM=XPLMON ,PARM=' ALTER' , REGION=20 OK 
//STEPLIB DD DSN=S1615, RDS. LOADLIB, UNIT=2321,D1SP=SHR, 
VOL=SER=CEL007 

//PROGRAM DD DSN=S1615 . RDS . PLATAC , UNIT=2 32 1 ,VOL=SER=CELOOl , 
DISP=SHR 

•//SYSPRINT DD SYSOUT=A 
//FT05F001 DD DDNAI-]E=SYSIN 
//FT06F001 DD SYSOUT=A 

//FT27F001 DD DSN=£.&PLCODF, , SPACE= (TRK , (20,10) ,RLSE) , 

// DCB== (BLKSIZE=3520,LRECL=80,RECFM=FB) , DISP= (NEW , PASS , DELETE) , 
// UNIT=SYSDA 
//SYSIN DD * 



PL/ATAC Program 
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//APSS EXEC PGM=APSS REGION=^2 0 0K 

//STEPLIB DD DSN=S1615.RDS.APSS,UHIT=2321,DISP= (OLD, KEEP) , 

// vol=ser=celoo5,dcb=blksi;:e=4oo 

//FT05F001 DD DDNAME=SYSIN 

//FTO 6F00 1 DD S YSOUT=A , DCB=-- (RECFM=FBA , LPECL=1 3 3 , BLKSIZE= 3 325) 
//FT08F001 DD UMIT=SYSDA ,SP7\CE= (CYL , 1) ,DCB=BUFNO=l 
//FT09F001 DD UNIT=SYSDA ,SPACE= (CYL, (7 ,2) ) , 

DCB= (RECFM=VBS,BLKSIZE=7180 ,LRECL=92 ,BUFNO==l) 
//FTlOFOOl DD UNIT=SYSDA,SPACE= (CYL, (7 ,2) ) , 

DCB= (PECFM=VBS,BLKSIZE==4204 ,LPECL=42 ,BUFN0=1) 
//FT20F001 DD UNIT=SYSDA, SPACE= (CYL , ( 7 , 2 ) ) , 

DCB= (BUFN0=1,RECFM=VBS ,BLKSIZE=2004 ,LPECL=500) 

//FT27F001 DD DSN=&&PLCODE,UNIT=SYSDA, DISP= (OLD, DELETE) , 
DCB=BUFN0=1 

//SYSPRINT DD SYSOUT=A , DCB= (RECFM=FBA,LRECL=133 ,BLKSIZE=3325) 
//SYSIN DD * 

$END 

/* 
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APPENDIX B 



DATA SIMULATION PROGRAM FORTRAN LISTING AND OUTPUT 



A description of program variables is included in the 
Data Simulation Program listing. The input data deck setup 
is also included in tlie listing. 
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APPENDIX C 



PULSE TRAIN SEPARATOR SIMULATION PROGRAM PL/ATAC LISTING 



Program variables are described as they are declared in 
the program. 



62 



SIMHE PL/AfAC COMPlttK VERSION uf EEBRUaRY I, 1974, CLOCK TIME = 9:SI:33./9. 
TOJAY IS MARCH 18. 1975. CLOCK TIME - 22:57:29.51. 



1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 
17 
16 

19 

20 
21 
22 

23 

24 

25 
2o 
27 
2b 

29 

30 
:>! 

32 

33 

34 

35 

36 
3/ 

38 

39 

40 

41 

42 

43 

44 
h5 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 
5o 
57 
5b 

59 

60 
61 
o2 

63 

64 

65 

66 
67 
Ob 

69 

70 

71 

72 

73 

74 

75 
7o 
77 



toggles: SPUNCH 

/"♦ PL/ATAL pulse TPftlN SEPARATOR 



NOTE 

IHIS VtRSIUN (Jf PL/ATAC CONTAINS NO DOUBLE PRECISION CAPABILITY 
NECESSI 1 ATI NG EMPLOYMENT OF THl *CUOt* COLLECT IlN HEAO «HtRE 
DOUBLE PRcv^IslCN CALCULATIONS ARt PERFORMEU. 

tt 

PROGRAM IS DESIGNED TO SIMULATE A HARDWARE SIGNAL PR E PROCE SS I NG 
SYSTEM WiTH A ^A^ABIlITY OF SEPARATING UP TO A MAXIMUM OF TEN 
stable pulse trains from the output Oh AN IFM RECEIVlR. THE IFM 
RECEIVER OPERATES IN CONJUNCTION rtITH A HIGH GAIN SCANNING 
AMENNA. FOR SlMULATICiv PURPOSES. DIRECTION OF ARRIVAL (DOAJ IS 
ASsUMtD TO BE JBTAINtU FROM AN AEiM’JTH RESOLVER GATED BY THE 
PUL.St train SEPERATORI PTS> HARDWARE. THE OUTPUT PULSES FROM THE 
IFM RECExVck FED TO TmE ARE SIMULATED BY LOADING A SERIES 

Cf FIVt WORDS FUR EACH :>ULSE RECEIVED. 

1. OOA - IN DEGREES LSB ^ I DEE, 

2. frtECUcNCY - IN JEKMS OF FREQUENCY BIN OF THE PULSE 
3,4. TIME OF ARRIVAL! TOAJ - DOUBLE PRECISION VALUc 

LSB ^ 25.6 MICROSECONDS. 

5. PULSE WlOTHIPW) - LSB 1 MICROSECOND 
UPON RECEIPT OF FIVE PULSES CF A STABLE TRAIN, THE PTS LOCKS 
CN THE TkAIN and CONTINUES TO TRACK THE TRAIN FOR ONE ANTENNA 
bEAMrtIDTH. the pulse REPETITION i NT ERV AL ( P a I ) IS COMPUTED AND 
AZIMUTH CENTRCIDING, BASED ON DOA AND TuA OF T Hr, FIRST AND LAST 

pulse of THE Train, is employed to compute the bearing cf the 

EMITTck aSSOCIATcD WITH THE TRAIN. THE PARAMtTERS ASSOCIATED 
WITH THE TRAIN, OUTPUT TO A MAINFRAME COMPUTcn FOR SIGNAL 
CLASSI FI CAT I CN, ».CNS1ST OF A SERIES OF SIX WORDS. 

1. EMITTER BEARING 

2. FREQUENCY 

3,4. TIME FIRST SEEN 

5. PULSE width 

6. PULSE REPETITION INTERVAL 

THIS OUTPUT IS SIMULATED BY STORING THE PARAMETERS IN A MEMORY 
BUFFER. 

RESIDUAL PULSES PASS THROUGH A SEPARATE CHANNEL OF THE PTS TO A 
HIGH SPEEu MIN! CCMPUTEFi WHERE THEY ARE PROCESSED TO DETERMINE 
PKl, JITTER AND STAGGER CHARACTERISTICS IF THEY EXIST. THIS 
ACTION IS blMUcAIEO BY COMPkE:>SING THE RESIDUAL DATA WITHIN THE 
INPUT buffer to 3E PROCESSED BY AN ATAC ASSEMBLY LANGUAGE 
PRuGkAM which MAY BE INCCRPORATEO USING THE CuDb COLLECTION HEAO 



GLlBAL VARIABLES 
/" DESCRIPTION OF GLOBAL VARIABLES 
RAM VARIAuLES 

BUf 4DD0 WCRD INPUT SUFFER 

NS NEW SIGNAL POINTER FILE. MOLDS POINTERS TO A MAXIMUM OF 5 
PULSES FOR EACH EMITTER UP TO 40 EMITTERS. 

IMIN DOUBLE PaECISION TIHc FIkST SEEN 

NC PTS ACTIVE CHANNEL COUNTER. INITIAL VALUE DETlkMINES 

NUMBER OF CHANNELS JF PTS. MAX NO CHANNELS = ID-NC INIT 
FI TIME INTERVAL BETWEEN PULSES 
PRI PULSE REPEllTICN INTERVAL 

CHAN 24U WORD BUFFcR IN WHICH STABLE PUlSE TRAIN PARAMETERS ARE 
STORED 

CNOX INDEX TC CHAN 
CINDX INDEX TO CHAN 

DP DATA Pointer 

SSF stable signal fcund 

NSSF inON-STAdlE signal FCUND 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

1 I 
12 

13 

14 

15 

16 
1 / 
18 
19 
2D 

2 1 
22 

23 

24 

25 

26 
27 
2b 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 
4D 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 
>3 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 
67 
6 8 

69 

70 

71 

72 

73 

74 
76 

76 

77 
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e 



to 


{ 








) 78 




79 


{ 








) 79 




80 


( 


REGISTER VAP(A8LES 






) 80 




81 


( 








) 81 




82 


( 


I , J NS F ILE iNi^EXES 






) 82 






( 


8P bJFFER PUIMER 






) 83 
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( 'V 








) 84 




85 


( 








) 85 




86 


(CECOARE 8UF(3999)RAM 






) 86 




87 


( DECLARE .'^S( lv9)k AM 






) 87 




88 


(DECLARE TMlrU 79JRAM 






) 88 




o9 


( DECLARE (NC» PI (5) ,PRI ( 1) ,CNDXJRAM 






) 89 




90 


( DECl ARE CHANU 1201RAM 






) 90 




91 


(DECLARE NSSM39)RAM 






) 91 




92 


(DECLARE SSM39) RAM 






) 92 




93 


(DECLARE C1N0X(39) RAM 






) 93 




94 


(ceclakc ( bp, I , j) register 






) 94 




95 


(DECLARE DP RAM 






) 95 




9b 


( 








) 96 




97 


(OEfIME TRUETbl. = (f ALSE.TRUE) 






) 97 




98 


( 








) 98 




99 


( 








) 99 




1 CO 


(LCCAu PRCCEOURt PRiCLMP 






) 100 




lOi 


( 








) 101 


PRICUMP 


1C2 


(/“ 


PRlCOMP DETERMINES THE STABILITY OF A PULSE TRAIN. 


IF STABLE 


) 102 


PRl COMP 


103 


( 


IHE PRl IS COMPUTED ANu THE T^AlN IS FLAGGED AS A STABLE TRAIN. 


) 103 


PRICUMP 


104 


( 


ALL PARAMETERS EXCEPT CF ARE LOADED INTO 


THE CHANNEL 


BUFFER. 


) 104 


PRl COMP 


105 


( 


IF THE TRAIN IS NGN STABLE IT IS FLAGbED 


AS SUCH. 




) 105 


PRICUMP 


106 


( 








) 106 


PR I COMP 


107 


( 


DESCRIPTION CF VARIABLES 






) 107 


PrI COMP 


108 


( 








) 108 


PR I COMP 


1C9 


( 


K,KK INDEXES FOR CALCULATIONS 






) 109 


PRICOMP 


1 10 


( 


MP missing pulse COUNTER 






) no 


PRICOMP 


1 11 


( 


PkIT£>. CALCULAIiCN \/ALUE OF PRl 






) 111 


PRICdMP 


1 12 


( "/ 








) 112 


PkU.OMP 


1 13 


( 








i 113 


PRICOMP 


1 14 


( DECIARE (K,MP,KK ,KJ iPRlTEMJRAM 






) 114 


PRICOMP 


1 15 


( 


K=^2 






) 115 


PRICOMP 


1 16 


( 


KK=KJ=1 






1 116 


PRICOMP 


117 


( 


MP=0 






) 117 


PRICOMP 


1 18 


( 








) 118 


PRICOMP 


1 19 


(/•• 


TEST PULSE INTERVALS TC DETERMINE STABILITY OF TRAIN 


. A PULSE 


) 119 


PRICOMP 


I 20 


( 


TRAIN IS CONSIDERED STABLE IF NO MURE THAN TWO MISSING PULSES 


) 120 


PRICUMP 


121 


( 


ARE ENCOUNTERED IN INITIAL PULSES AND VARIATIONS IN 


TIME 


) 121 


PRICOMP 


1 22 


( 


INTERVAL between PULSES DOES NOT EXCEED 


*■- 51.2 MICROSECONDS. ” / 


) 122 


PRICOMP 


123 


( 








) 123 


PRICOMP 


124 


( 








) 124 


PRICOMP 


12:> 


( LuCPl : 






) 125 


PRICOMP 


126 


( % 


DO 






) 126 


PRICOMP 


127 


( 


TESTaMP>2 






) 127 


PkICOMP 


128 


( 


IFSO: LEAVE LOCPI 






) 128 


PRICOMP 


129 


( 


END 






) 129 


PRICOMP 


1j>0 


( 


TEST DPI ( . (iK-l ) . )/aKK IN ( dP 1 ( . iK . ) / iK J- 


2) TO (2)PI(. 


3K. ) /3KJ f2 ) 


) 130 


PRICOMP 


131 


( 


ABOVE: 00 






) 131 


PRICOMP 


132 


( 


MP=SMP^ 1 






) 132 


PRl C l MP 


133 


( 


KK=aKK^' 1 






) 133 


PRICOMP 


134 


( 


REPEAT LCCPl 






1 134 


PRICOMP 


1:>5 


( 


END 






) 135 


PRICCMP 


136 


( 


below: do 






) 136 


PRICOMP 


137 


( 


HP-5)MP+ 1 






) 13/ 


PRICuMP 


138 


( 


KJ=3KJf 1 






) 138 


PRICOMP 


139 


( 


RcPEAT lCOPI 






) 139 


PRICCMP 


140 


( 


END 






) 140 


PRICOMP 


I4l 


( 


END 






) 141 


PRICOMP 


142 


( 


K=OK»- 1 






) 142 


PKIuOMP 


143 


( 


KK=OKJ 






1 143 


PRICOMP 


144 


( 


KJ=1 






) 144 


PRl COMP 


145 


( 


test 3K>4 






) 145 


PRICOMP 


146 


( 


IFNQT: REPEAT LCOPI 






) 146 


PRICCMP 


147 


( 


END 






) 147 


Pb.I COMP 


148 


( 








) 148 


PRICOMP 


149 


( /•' 


COMPUTE PRl and test FCR ROUND OFF ERROR 


. IF ERROR 


EXISTS 


) 149 


PRICOMP 


15U 


( 


RCJND UP BY 1. 






) 150 


PRl CCMP 


151 


( "/ 








) 151 


PKICOMP 


152 


( 








) 152 


PRICOMP 


1 53 


( 


K= 1 






) 153 


PRICOMP 


154 


( 


PRI^O 






) 154 


PR i CCMP 


155 


( 


ITERATE 4 TIMES 






) 155 


PRICOMP 


15t> 


( 


PkI^JPRI fiPI ( .3K. ) 






) 156 


PRl COM 


157 


( 


K = iX 1 






) 157 


PRICCMP 


158 


( 


END 






; 158 


PRICOMP 


159 


( 


PRITEM=3PR1 






) 159 


PR ! COMP 


160 


( 


F'RI=3PRJ/ (4+3MP1 






) 160 


PkICOMP 


161 


( 


TEST DPkITcM MCu( 4fDMPl>(4«-3MP)/2 






) 161 


PR I com: 


162 


( 


IFSO: PRl = aPi\H-l 






} 162 


PRICOMP 


163 


( 


END 






) 163 


PRICOMP 


164 


( 








) 164 


PR I CuMP 


lc5 


( / " 


LOAD PARAMETERS INTO CHANNEL BUFFER "/ 






) 165 


PRICCMP 


166 


( 








) 166 


PKI COMP 


167 


( 


OP^JNSI . 31 . ) 






) 167 


PRICOMP 


1 6o 


( 


CNDX = ci)CNDX*-6 






) 168 


PRl CUMP 


169 


( 


C INOM .0)1/5. )=3CN0X 






) 169 


PRICCMP 


170 


( 


CHA\( . (o;CNDX+ I I . )=o)BUF( . ( DUP f 1 ) . ) 






) 170 


PkICOMP 


171 


( 


CFA4( . ( o.CnDa*^ 2 ) . l-aTMlN(.(3l/5<*2).l 






) 17 1 


PRICUMP 


1 72 


( 


CHA\ ( . ( 3CNDXV j i . i=3TMlN ( . ( <31 /5<‘2*- 1 ) . ) 






) 172 


PRICUMP 


1 73 


( 


CFiA'J(.(a'CNDX^‘t). J=o;bUF( .(3DPt-4) . ) 






) 173 


PRICOMP 


174 


( 


CHAN( . ( <i,CNDX + 5) . 1 ==u)PRI 






) 174 


PRICCMP 


175 


( 








1 175 


pkiclmp 


1 76 


( /” 


FLAG PULSE TRAIN AS SIA8LE AND INCREMENT 


CHANNEL COUNTER *V 


) 1 76 


PKI CCMP 


1 77 


( 








) 177 


PRI ClMP 


1 78 


( 


SSF( .(a.I/51 . )=TRUE 






) 178 


PRICCMP 


179 


( 


NC=3NC+1 






) 1 79 


PRICE MP 


1 80 


( 


RE TURN 






) 180 


PK UC'^P 


ifcl 


» END LCGPl 






) 181 


PKI 


182 


( 








1 182 


PKl Cl/*<P 



64 



18:> 


( 




) 133 


PRICG^P 


i b4 


1 /•• 


TRAIN IAILEO stability TEST. FLAG TRAIN AS NON STA8Lt ”/ 


) 184 


PR I CG 46 


185 


( 




) 185 


PR I COMP 


1 86 


( 


NSsF( . (iJl/5) . )=TRCE 


) 186 


PR I COMP 


187 


(ENO PKICOMP 


) 187 


PkILuMP 


188 


( 




) 188 




lev 


( 




) 189 




190 


(PHGCEOUPE MAIN 


) 190 




191 


( 




) I9I 


Main 


192 


(/" 


DESCRIPTION OF VARIABLES 


) 19^ 


main 


19j> 


( 




) 193 


MAIN 


194 


( 


BRNGF RCVk ANTENNA BEARING AT TOA OF FIRS! PULSE OF A SIGNAL 


) 194 


MAI N 


195 


( 


bRNGL RCVk ANTENNA GtARIivjG AT fUA OF LAST PJLSE OF A TRAIN 


) 195 


MAIN 


i96 


( 


CONI DOUBLE PRECISION TIME CALCULATION VARIABLE 


) 196 


MAIN 


197 


( 


CUN2 OGUbLE PKtClSIuN TIME CALCULATION VARIABLE 


) 197 


MAIN 


19b 


( 


IliJJ INDICES 


) 198 


MAIN 


I 99 


( 


SCANTM kCVR ANTENNA SCAN TIME FOR ONE 6EAMWIDTH 


) 199 


MAIN 


2 00 


( 


TCAL LOWER HALF DOUBLE PKcCISION TIME OF akKIVAL 


) 200 


MAI N 


201 


( 


TCAU UPPER HALF DOUBLE PRECISION TIME OF AkRIVAL 


) 201 


MAIN 


2 02 


( 


TMAX tXPECTLD TIME UF OAST PUoSE INTERCEPT 


) 202 


M A I iN 


203 


( 


TMIN DOUBLE PRECISION TIME OF ARRIVAL OF fIRST PULSE 


) 203 


MAIN 


204 


( 


TTEM double PRECISION TIME CALCULATION VARIABLE 


) 204 


MAIN 


2C5 


( 


TTEST DOUBLE PRECiSlCN TIME CALCULATION VARIABLE 


) 205 


MAIN 


206 


(••/ 




) 206 


MAIN 


207 


( 




) 207 


MAI N 


208 


( DECCARE (BkNGF ,BRNGL (39) ,SCANTM( I) , 1 I , JJ,STR)RAM 


) 208 


MAIN 


2 09 


(DECLARE! TCAL , TUAUtTMAXI 79) »TItST(l) ,TTEM(1))RAM 


) 209 


MAIN 


2 10 


(ULCLARE(CONKl) ,CLN2(1) )RAM 


) 210 


MAIN 


211 


( 




) 211 


MAIN 


2 12 


(/’• 


INITIALIZE VARIABLES ”/ 


) 212 


MAIN 


213 


( 




) 213 


MAI N 


2 14 


( 


CNDX=-6 


) 214 


MAIN 


215 


( 


SCA.NTM=1 120 


) 215 


MAIN 


2 16 


( 


1=0 


) 216 


MAItN 


zI7 


( 


bP=0 


) 217 


MAIN 


218 


( 


NC=1 


) 218 


MAl N 


219 


( 




) 219 


MAl N 


2 20 


( /'• 


Set new SIGNAL POINTER FILE TO NEGATIVE VALUES *’/ 


) 220 


MAIN 


221 


( 




) 221 


MAIN 


2 22 


( 


ITERATE 200 TIMES 


) 222 


MAIN 


2 2b 


( 


NS( . ) =- I 


i 2 2b 


MAIN 


2 2-+ 


( 


i=ai+l 


) 224 


MAI N 


225 


( 


END 


) 225 


MAI N 


2 26 


( 


1=0 


) 226 


MAIN 


227 


( 


NS( .81 . )=0 


) 227 


MAIN 


228 


( 




) 228 


MAIN 


229 


(/" 


LCAD INPUT BUFFER FROM CARDS »/ 


) 229 


MAI N 


2 30 


( 




) 230 


MAI N 


231 


( 


RE AD^DECI BUF , bUF ^3999 ) 


) 231 


MAIN 


232 


( 




) 232 


MAIN 


233 


( MAINLP: 


) 233 


MAIN 


2b4 


i% 


DO 


) 2b4 


MAIN 


2b5 


( 




) 235 


MAI N 


236 


(/" 


LCAD DP TOa of FIRST PULSE OF SIGNAL FROM INPUT BUFFER AND 


) 236 


MAIN 


237 


( 


COMPUTE EXPECTED TIME OF ARRIVAL Oe LAST PULSE BASED ON RCVR 


) 237 


MAl N 


236 


( 


ANTENNA SCAN TIME FCK CNE ANTENNA BEAMWlDTH "/ 


) 238 


MAIN 


239 


( 




) 239 


MAIN 


240 


( 


TCAL = <i)BUF( . (tf BP + 2 ) . ) 


) 240 


MAIN 


241 


( 


TCAU = aBUF( . (g)3P + 3) . ) 


) 241 


MAIN 


242 


( 


CCDE 


) 242 


MAI N 


2 43 


( 


LDRM Dil4,TCAL,2 


) 243 


MAI N 


244 


( 


DADO D, 14, SCANTM 


J 244 


KAI N 


245 


( 


STRM D, 14, ITEM, 2 


) 245 


MAl N 


2 46 


( 


ENO 


) 246 


MAl N 


247 


( 


STR=El/5<^2 


) 247 


MAIN 


2 48 


( 


TMAXI .aSTR . )=aTTEM 


) 248 


MAI N 


249 


( 


TMAX( .(^DSTReIJ . )=2TTEM( . 1. ) 


) 249 


MAIN 


250 


( 


TMIN ( .aSIR. )=2T0AL 


) 250 


MAIN 


251 


( 


TMINI . (aSTR + 1 ) . ) =ETOAU 


) 251 


MAIN 


2 52 


(COMPUTE: 


) 252 


MAIN 


^53 


( % 


DC 


) 253 


M A I N 


2 54 


( 




) 254 


MAIN 


255 


( /« 


INCREMENT BUFFER POINTER AND CHECK AT BUFFER lIMIT. IFSO, GO 


) 255 


MAIN 


2 56 


( 


COMPRESS RESIDUAL PULSES WITHIN INPUT BUFFER FOR FUTHER PROCESSING 


) 25o 


MAIN 


257 


( “/ 




) 257 


MAI N 


258 


( 




) 253 


MAIN 


2 59 


( 


BF=5BP^5 


) 259 


MAIN 


260 


( 


TEST BBP53999 


) 260 


MAIN 


261 


1 


IFSO: LEAVE MAINLP 


) 26 1 


MAIN 


262 


( 


END 


) 2o2 


MAIN 


^63 


( 




) 263 


M A I ri 


264 


( /» 


IF NO SIGNAL IN BUFFER INDEXED BY BUFFER POINTER INCREMENT 


) 26*t 


MAI N 


265 


( 


PCINTER AND REPEAT COMPUTE "/ 


) 265 


MAIN 


266 


( 




) 266 


MAIN 


267 


( 


TEST a)BUF ( .aBP. ) 


) 267 


MAIN 


268 


( 


7EK0: REPEAT COMPUTt 


) 263 


MAi N 


269 


( 


END 


1 269 


MAIN 


2 70 


( 


1=0 


) 270 


MAI N 


271 


( 


J=0 


) 271 


MAIN 


272 


( SORT : 


) 272 


MAIN 


2 73 




DC 


) 273 


MAI N 


2 74 


( 




) 274 


MAIN 


275 


( / " 


IF AT END OF NhW SIGNAL POINTER FILE, LEAVE SORT *'/ 


) 275 


MAi N 


2 76 


( 




) 27d 


MAI', 


277 


( 


TEST ?I>195 


) 2/7 


MAIN 


2 7b 


( 


IfSU: LEAVE SORT 


) 27b 


MAi N 


2 79 


( 


END 


) 279 


MAIN 


260 


( 




) 280 


MAIN 


281 


i /'• 


IF NEW SIGNAL POINTER FILE INDEXED bV I IS EMPTY INDEX AND 


) 281 


HAI 


282 


( 


CHECK NtXT LOCAULN '*/ 


) 282 


MAIN 


283 


( 




) 283 


MAIN 


2o4 


( 


TEST <uNS( .ai . ) 


) 284 


MAIN 


285 


( 


i\EG: do 


) 265 


M A 1 N 


2«b 


( 


i=ai ♦ 5 


) 286 


MAIN 


287 


( 


REPEAT SCRT 


) 28 7 


M A r N 



65 



266 


( 


END 


1 


288 


MA I N 




( 


END 


1 


289 


MAIN 


2S0 


( 




1 


29D 


main 


291 


</" 


COMPARE TGA Cf BUFTER SIGNAL WITH TMAX OP SIGNAL f OUNi) IN NEW 


} 


29 1 


main 


2 9^ 


( 


SIGNAL POINTER FILE. IF TOA OF BUFFEK SIGNAl IS GREATfR THAN 


) 


292 


MAIN 


293 


i 


OR EuUAL Tj TMAX, TtST FOR STAbLE SIGNAL IN NS POINTER FILE. 


) 


29 3 


M A I iN 


294 


( 


IF SIGNAL HAS BEEN CLASSIFIED STABLE, RESET ACTIVE CHANNEL 


} 


2 99 


MAIN 


295 


( 


CGUMER AND SSF FLAG. ZERO FIRST FIVE PULSES TKOM THIS SIGNAL 


) 


295 


MAIN 


296 


( 


IN INPUT Buffer and compute emitter bearing using first and 


) 


296 


MAIN 


297 


( 


UOA OF SlGNAc "/ 


1 


297 


MAIN 


296 


( 




1 


298 


main 


299 


( 


CONl=aiBuF( . (5)BF+2) . 1 


1 


299 


MAIN 


3o0 


( 


CLM ( . 1 . )=a)BUF( . { aBP*3) . > 


1 


300 


MAIN 


301 


1 


CCN2 = a)TMAX< . ( aJl/5«2) . 1 


) 


301 


M A I 


302 


i 


C0N2( .i.)=»TMAX(.(a:i/54£fl}.> 


1 


302 


MAIN 


3u3 


( 


CODE 


1 


303 


MAIN 


304 


( 


LDRM D, 14, CONI, 2 


) 


304 


MA I N 


305 


( 


LDRM D,7,CCN2,2 


1 


305 


MAIN 


306 


( 


OSUB R,7,14 


1 


306 


MAIN 


307 


( 


STRM D,7,TTEST,2 


) 


30 7 


MAIN 


3Cb 


( 


END 


) 


308 


MA I N 


309 


( 


TEST DTTEST 


i 


309 


M AIN 


j»i0 


( 


NEG,2ER0: DO 


1 


310 


MAI N 


311 


( 


TEST d)SSF( . (ai/5) . ) 


1 


31 1 


MAIN 


:>U 


< 


PUS: DO 


) 


:>12 


MAIN 


313 


( 


NC=SNC-1 


1 


313 


M A I T4 


314 


( 


SSF ( . (dl /5) . } =FALSE 


1 


314 


MAIN 


315 


( 


8RNGF = dBUl ( . UnS( . o) I . 11 . ) 


1 


31 5 


MAIN 


316 


( 


I 1=0 


1 


316 


MAIN 


317 


( 


ITERATE 5 TIMES 


1 


31 7 


MAIN 


318 


( 


JJ = 0 


) 


31o 


MAIN 


319 


( 


I TERATE 5 TIMES 


) 


319 


MAI N 


320 


( 


EUF I . (SNSl . ( o)I ♦ai I J . H-ajJ I. J = 0 


) 


320 


MAIN 


321 


< 


jj=aj jf 1 


1 


321 


MAIN 


322 


( 


END 


1 


322 


MAIN 




( 


ii=aiifi 


) 


323 


MAIN 


324 


( 


END 


1 


324 


MAIN 


325 


( 


CHAN( .ac INDXI .a I /5 . ) . ) = ( abRNGFf2 8KNGL (.91/5.11/2 


1 


325 


MAIN 


j26 


i 


END 


1 


326 


MAIN 


327 


( 


END 


1 


32 7 


MAI N 


328 


( 




1 


323 


MAIN 


329 


i /” 


IF NS POINTER FILE SIGNAL HAS BEEN CLASSIFIED AS NON STABLE 


) 


329 


MAIN 


330 


( 


RESET NSSF FLAG "/ 


1 


330 


MAIN 


331 


( 




1 


33 1 


MAIN 


332 


i 


NSSF(.(ai/5>.)=FALS£ 


) 


332 


M A I N 


333 


( 




1 


333 


MAIN 


^34 


(/" 


CLEAR THE SIGNAL FROM NS POINTER FILE '*/ 


) 


334 


MAIN 


335 


( 




) 


335 


MAIN 


336 


( 


I I =0 


1 


336 


MAIN 


337 


( 


ITERATE 5 TIMES 


1 


33 7 


MAIN 


338 


( 


NS( . (ai fii n . )=-l 


1 


338 


MAIN 


339 


( 


I i=ai I + 1 


1 


339 


MAIN 


340 


( 


END 


1 


340 


MAIN 


341 


( 


i=ai r5 


1 


34 1 


MAIN 


j42 


( 


REPEAT SORT 


1 


342 


MAIN 


343 


( 


END 


1 


343 


MAIN 


344 


( 


END 


) 


344 


MAIN 


3 45 


i 


TEST U.6UF( . ( aep<- 1 1 . )= = aBUF( . (o^NSI .ai .H-ll . 1 


1 


345 


MAIN 


346 


( 


IFNOT: DO 


1 


346 


MAI N 


j>47 


( 


i = ai ^5 


1 


347 


MAIN 


348 


( 


REPEAT SCkT 


1 


348 


y. A I N 


349 


( 


END 


1 


349 


MAIN 


j»50 


( 


END 


1 


350 


MAIN 


351 


( 




1 


351 


MAIN 


J52 


( /" 


TEST FOR MATCH 8ETWEFN BUFFER SIGNAL FREQ AND FW AND NS SIGNAL 


1 


352 


iM A I N 


353 


< 


POINTER FILE FRE., AND Pw. IF 3QTH DO NOT MATCH REPEAT SORT. 


1 


353 


MAIN 


354 


( 


IF MATCH OCCURS AND SIGNAL HAS bEEN CLASSIFIED AS STA3LE, 


1 


354 


MAIN 


355 


( 


ZERO BUFFER SIGNAL AND REPEAT COMPUFE. IF SIGNAL HAS BEEN 


1 


355 


MAIN 


3 56 


( 


CLASSIFIED Ag NCN STABLE, REPEAT COMPUTE. "/ 


1 


35b 


MAIN 


357 


< 




1 


35 7 


MAIN 


358 


( 


TEST aBUF( .(aap + 4i.>==aBUF(. idnsi - ai . n-4i . i 


1 


358 


MAIN 


359 


i 


IFNOT ; DO 


1 


359 


M A I N 


360 


( 


i=aif5 


1 


360 


MAIN 


3tol 


( 


REPEAT :>GRT 


> 


3ol 


MAIN 


362 


( 


END 


1 


362 


MAIN 




( 


END 


} 


363 


MAIN 


3 64 


( 


TEST u)SSF( . (ai/51 .1 


1 


364 


MAIN 


3c5 


( , 


NONZERO: DO 


) 


365 


MAIN 


366 




6RN^L( .aI/5. )=a3UF( .aflP. i 


) 


366 


MA I N 


367 


< 


I 1=0 


} 


36 7 


MAIN 


36b 


( 


i TERATE 5 TIMES 


1 


368 


MA I f'J 


369 


( 


6UF( . (iBP*-ai I 1. >=0 


1 


369 


MAIN 


37U 


( 


I i=ai U 1 


1 


370 


.MAIN 


371 


( 


END 


1 


37 1 


MAIN 


372 


( 


REPEAT COMPUTE 


1 


372 


MAIN 


373 


i 


END 


1 


373 


MAIN 


374 


( 


END 


1 


37‘t 


MAIN 


375 


( 


TEST aNSSF ( . ( ai/5 > . 1 ==TRU£ 


1 


375 


MAl N 


3 76 


( 


IFSO: REPEAT COMPUTE 


) 


376 


MAIN 


j>77 


( 


END 


) 


3/7 


MAIN 


378 


( 




1 


378 


MAIN 


:»7V 


( /" 


IF SIGNAL HAS NOT BEEN CLASSIFIED, STORE BUFFER PuINTER IN 


1 


379 


MAt N 


3 80 


i 


NS ToINTER FILE. IF THIS IS ThE FIFTH PULSE ASSOCIATED WITH 


1 


380 


MAIN 


381 


( 


This TRAIN, CoMPJTr TIME INTERVALS BETwEEN PULSES AND cAlL 


} 


381 


M A 1 N 


382 


( 


FGa PKi COMPUTATION. "/ 


) 


382 


MA I N 


3o3 


( 




) 


383 


MAIN 


3 64 


( I TtRAT= 3 1 IMES 


1 


38h 


MAIf, 


335 


( 


J=o*J f 1 


1 


335 


MAIN 


386 


( 


TEST oJNS(.(ai«aj>.l 


1 


386 


MAIN 


387 


( 


Nto: Du 


> 


38 / 


MAIN 


363 


( 


NS ( . ( ai j 1 . i =aBF 


1 


388 


MAI , 


j>89 


( 


RcPlAT COMPUTE 


1 


389 


MAIN 


390 


( 


END 


> 


390 


MAI N 


391 


( 


END 


1 


391 


MAI N 


392 


( 


FND 


1 


39 2 


MAI N 



66 



303 ( 


NS( . (a)I ♦41 . )-a8P 








) 


393 


MAIN 


3-9^ ( 


lEST a)Nc==10 








) 


394 


Main 


3 95 ( 


IF SO: uO 








) 


395 


MAI N 


( 


NSSF ( . ( al /5 1 - ) =TRUE 








) 


396 


MAIN 


3S7 ( 


REPEAT COMPUTE 








) 


39 7 


MAIN 


303 ( 


END 








) 


396 


MAI N 


39V ( 


END 








1 


399 


MAIN 


<ro0 ( 


J= 1 








) 


400 


MAIN 


401 ( 


I TERAI t 4 TIMES 








) 


401 


MA I N 


4U^ ( 


Pi( .oiJ. 1 =£BUF (.(a)NS(.(ai+.iJ) .)^2I. 


~3BUF( . 


(ojNS( . ( dl f«J- I I . ) f2) . ) 


) 


402 


MAI 


403 ( 


TcST oiPI ( . olJ. 1 








) 


403 


MAIN 


4C4 ( 


NEu: PI ( .iJ. ) =oJPI ( 1 +32 7o7 








) 


404 


MAIN 


v05 ( 


END 








) 


405 


MAIN 


40o ( 


j=aj+i 








) 


406 


MAIN 


40/ ( 


END 








1 


40 7 


MAI N 


4C8 ( 


CALL PRICOMP() 








1 


408 


HAI N 


409 ( 


REPEAT COMPUTE 








) 


409 


M A 1 ,N 


HiO (END SCkT 








) 


410 


MAIN 


411 ( 


1=0 








J 


41 1 


MAIN 


4U ( 


CYCLE 








) 


412 


MAIN 


413 ( 


TEST DNS( .il . ) 








) 


413 


tMAI N 


414 ( 


Ntu: OJ 








) 


41 H 


MAIN 


413 ( 


NS( .aJI . )=jj3P 








) 


415 


MAIN 


416 ( 


REPEAT MAI NLP 








! 


416 


MAIN 


417 ( 


END 








) 


41 7 


MAI N 


413 ( 


END 








) 


418 


MAIN 


419 ( 


TESM I = 3If5)>195 








) 


419 


MAIN 


4 20 ( 


IFSO: DD 








1 


420 


MAIN 


421 ( 


DUMP 0EC(NS,NSvl95) 








} 


421 


MAIN 


422 ( 


RETURN 








1 


422 


MAIN 


42^ ( 


END 








) 


423 


MAIN 


4 24 ( 


END 








) 


424 


MAIN 


425 ( 


END 








1 


h25 


MAI N 


426 ( END CCMPUTE 








) 


426 


MAIN 


427 (END NAINDP 








1 


427 


MAIN 


428 ( 










) 


428 


MAIN 


429 (/•' rOUTINE dELC/» COMPRESSES KESIDUAL 


PULSES 


WITHIN THE 


INPUT 


) 


429 


MAIN 


4:jO ( 


bUi-LEK. AN ATAC AbStMBLY LANGUAGE 


PKUuKAM 


td process 


THIS 


) 


430 


/•(AIN 


431 ( 


KESIDUAL MAY BE INCCRPCRATED dETwEEN THE 


END AND END 


MAIN 


) 


431 


MAIN 


432 ( 


STATEMENTS UTItlElNU THE CDDE COLLECTION 


HEAD. "/ 




) 


432 


MAIN 


43j ( 










) 


433 


MAIN 


4 34 ( 


8F = 0 








) 


434 


MAIN 


435 ( 


2ER0CK: 








) 


435 


MAIN 


4^0 ( cycle 








) 


436 


M A I N 


4 37 ( 


TEST fl;bUF ( • fluBPR I • ) 








) 


437 


MAi N 


43S ( 


ZERO: DO 








) 


438 


MAI N 


439 ( 


DP = (i}8P 








) 


439 


MAIN 


*♦40 ( 


LEAVE 2ER0C< 








I 


440 


MAI N 


441 ( 


END 








1 


441 


MAI N 


442 ( 


END 








) 


442 


MAIN 


443 ( 


8F = aBP^-5 








) 


443 


MAIN 


444 ( END ZERCCK 








) 


444 


MAIN 


445 ( 


CYCLE 








) 


44 5 


MAIN 


4 46 ( 


bP=o]6P<-5 








) 


446 


MAIN 


447 ( 


TEST aBP>3v95 








1 


44 7 


MAIN 


448 ( 


IFSO: DO 








) 


448 


MAIN 


449 ( 


RETURN 








) 


<♦49 


MAIN 


450 ( 


END 








1 


450 


MAIN 


451 ( 


cNO 








) 


451 


MAIN 


452 ( 


TEST a8UF( . (aBP^-l 1 . )= = 0 








) 


452 


MAIN 


453 ( 


IFNOT: DO 








1 


453 


M A I N 


4 54 ( 


1 = 0 








) 


<+54 


MAIN 


•♦55 ( 


ITERATE 5 TIMES 










455 


MAIN 


456 ( 


8UF( , ( 4i)UP*cH ) . ) = 36UF( . ( aibP<-o1I ) . 1 




) 


456 


11 A I N 


457 ( 


8UF( . ( a8P TGI ) . 1 = 0 








) 


457 


MAI N 


4 58 ( 


i=ai+i 
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458 


MAIN 


459 ( 


END 








) 


459 


MAIN 


4oO ( 


DP=aOP+5 








) 


460 


MAIN 


461 ( 


ENO 








1 


461 


i<5AI N 


4o2 ( 


End 
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462 


M A I /M 


4o3 ( 


END 
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463 


MAIN 


464 ( END MA IN 
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MAIN 


465 ( 
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465 
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466 




467 link module FCR EXtrCUTING PL/ATAC PROGRAM. 
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467 




468 ( 


SEXECUT 1 VE 








) 


468 




4 69 ( « <^ »V 








) 


469 




4 70 ( 


MCDULE link 
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470 




471 ( 


DECLARE PkOCS TK( 64) RAM 








) 


47 1 


LINK 


472 ( 


RO = PKDCSTK 








) 


472 


LINK 


4 73 ( 


CALL MA1N( 1 
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473 


LINK 


4 74 ( 


ENO LINK 
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474 


LINK 


475 (EOF Eof eDF EOF EOF EOF EOF EOF EOF 
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